IF exists(SELECT * FROM dbo.sysobjects WHERE name='WEB_leraarRoosterVandaag' AND xtype='P') 
BEGIN
	DROP PROCEDURE WEB_leraarRoosterVandaag
END
GO

create procedure WEB_leraarRoosterVandaag(@naamcode char(4))
as
set nocount on

create table #leraarRooster(deLeraar varchar(4),hetVak varchar(2),
	deKlas varchar(20),deDag varchar(2),hetUur int,hetLokaal varchar(20))

declare @nu datetime
set @nu=getDate()

insert into #leraarRooster
execute leraars..RV_weekroosterLeraar @naamcode,@nu

-----------------------------------------------------
--  OPSTELLEN XML
-----------------------------------------------------

select 0 as volgNr, '<?xml version=''1.0'' encoding="ISO-8859-1" ?>' +
'<rooster>' +
'<titel>' + rtrim(@naamcode) + '</titel>' +
'<datum>' + convert(varchar(20),getDate(),103) + '</datum>' as tekst
union
select 1,'<lijn dag="' + lower(deDag) +
	'" uur="' + convert(varchar(3),hetUur) + '">' +
	'<v>' + hetVak + '</v>' +
	'<l>' + hetLokaal + '</l>' +
	'<k>' + deKlas + '</k></lijn>'
from #leraarRooster
union
select 3,'</rooster>'
order by volgNr